home *** CD-ROM | disk | FTP | other *** search
/ MACD 5 / MACD 5.bin / internet / irc_i_dodatki / kuang / kuangeleven28.lha / Rexx / Pub / light.AMIRX < prev    next >
Text File  |  1997-03-07  |  665b  |  24 lines
  1. /* Kuang 11 Public Channel Plugin - Light
  2.    Light ciggarette :)
  3.    ±light nick
  4.    /me graciously lights nick's cigarette
  5.    ±light nick marlboro light
  6.    /me graciously lights nick's marlboro light cigarette
  7.    ±light - marlboro light
  8.    /me graciously lights requestersnick's marlboro light cigarette
  9. */
  10. options results
  11. parse arg nick channel pxf pxt imop autochan text
  12. if ~autochan|getclip('st_afnd')=nick then exit
  13. setclip('st_afnd',nick)
  14. "ECHO" text
  15. parse var text . text rest
  16. if text~='-'&text~='' then nick=text
  17. rest=strip(rest)
  18. if rest='' then rest=' '
  19. else rest=' 'rest' '
  20. 'SAY /ME graciously lights' nick"'s"rest"cigarette"
  21. delay(500)
  22. setclip('st_afnd')
  23.  
  24.